home *** CD-ROM | disk | FTP | other *** search
/ Monster Media 1994 #2 / Monster Media No. 2 (Monster Media)(1994).ISO / prog_bas / menuwat.zip / MWDEMO4.FRM (.txt) < prev    next >
Visual Basic Form  |  1993-08-30  |  12KB  |  323 lines
  1. frmMWDemo4
  2. Menu Watch Demo 4
  3. wwwwwwwwwwwwp
  4. wwwwwwwwwwwwp
  5. Form1
  6.     MenuWatch
  7. SKL_MenuWatch
  8. picStatusBarContainer
  9. pnHelp
  10. SSPanel
  11. MS Sans Serif
  12. pnStatus
  13. SSPanel
  14. MS Sans Serif
  15. FileMenu
  16. &File
  17. FileNewOpt
  18. FileOpenOpt
  19. &Open...
  20. FileSaveOpt
  21. &Save
  22. FileSaveAsOpt
  23. Save &As...
  24. FileSep1
  25. FilePrefSubMenu
  26. &Preferences
  27. FilePrefViewOpt
  28. &View...
  29. FilePrefDialogsOpt
  30. &Dialogs...
  31. FileSep2
  32. FileExitOpt
  33. E&xit
  34. EditMenu
  35. &Edit
  36. EditUndoOpt
  37. &Undo
  38. EditSep1
  39. EditCutOpt
  40. EditCopyOpt
  41. &Copy
  42. EditPasteOpt
  43. &Paste
  44. MenuHelp
  45. minMnuHlpIdx
  46. maxMnuHlpIdx
  47.     Form_Load
  48. HelpFile8
  49. MenuWatch_Closeg
  50. pnHelp
  51. VisibleD
  52. MenuWatch_Open
  53. MenuWatch_Selectz
  54. ItemID
  55. FileOpenOpt_Clickg
  56. NewMDIChild
  57. frmMDIChildF
  58. EditCopyOpt_ClickZ
  59. EditCutOpt_Clickl
  60. EditMenu_Click
  61. EditPasteOpt_Click
  62. EditSep1_Click#
  63. EditUndoOpt_Click
  64. FileMenu_Click
  65. FileOptPrtDeviceOpt_Click
  66. FileOptPrtPrevOpt_Click
  67. FileOptPrtSubMenu_Click&
  68. FileOptSubMenu_Click
  69. FileSep2_Click}
  70. MDIForm_Load:
  71. picStatusBarContainer_Click
  72. pnHelp_DragDrop
  73. Source
  74. Control    
  75. pnStatus_DragDrop
  76. MDIForm_LinkOpen
  77. Cancel
  78. MDIForm_LinkExecute
  79. CmdStr"
  80. MDIForm_LinkError
  81. LinkErrS
  82. MDIForm_LinkClose
  83. MDIForm_DragOver
  84. State
  85. MDIForm_DragDropi
  86. MDIForm_Deactivate
  87. MDIForm_Activate
  88. MDIForm_QueryUnloadu
  89. UnloadModeM
  90. MDIForm_Resize
  91. MDIForm_UnloadX
  92. CountMDI
  93.     MenuWatch
  94. maxFileMnuOptIdx
  95. LastCountMDI
  96. MenuR
  97. helpC
  98. status
  99. TheMax
  100. TheMin
  101. DocNm
  102. Caption
  103. frmDemoApp1
  104. ActiveForm
  105. Screen1
  106. WindowState
  107.     MenuHelp2
  108. minMnuHlpIdx2Z
  109. maxMnuHlpIdx2
  110. MDIChildMaximized
  111. Changed
  112.     MenuState
  113.     MAXIMIZED#
  114. CountMDIOnLastMnuRefresh#
  115. NumPulldowns1
  116. NumOptions
  117. NumFileOptions
  118. maxWinListMnuOptIdx
  119. maxWinListMnuOptIdx2P
  120. WinListMnu
  121. WinListMnu2
  122. WinListPulldown
  123. WinListPulldown2
  124. frmMWMDIChild=
  125. NumExtraOpts
  126. fSeparator
  127. MenuHelpText
  128.     MenuHelp1{
  129. fMenuHelpInited
  130. InitMenuHelp
  131. ExitFunction
  132. minMnuHlpIdx1c
  133. maxMnuHlpIdx1
  134. maxWinListMnuOptIdx1
  135. WinListPulldown1
  136. minMnuHelpIdx1
  137. minMnuHelpIdx2
  138. maxWinLstOptIdx1
  139. WinLstPulldown1
  140. maxWinLstOptIdx2
  141. WinLstPulldown2
  142. maxWinLstIdx1
  143. maxWinLstIdx2
  144. WindowList
  145. propertyc
  146. nWinLstMnuOpts1s
  147. nWinLstMnuOpts2
  148. nWinLstOpts1
  149. nWinLstOpts2
  150. MenuHelpIdx
  151. maxWinLstIdx
  152. nWinLstOpts
  153. WinLstPulldown
  154.     gCountMDI
  155. added
  156. store
  157. count
  158. options
  159. FileNewOpt_ClickS
  160. FilePrefDialogsOpt_Clickl
  161. FilePrefSubMenu_Click
  162. FilePrefViewOpt_Click
  163. FileSaveAsOpt_Click
  164. FileSaveOpt_Click
  165. FileSep1_Click
  166. FileExitOpt_Click
  167.     OnFileNew
  168. FileExitOpt_Click
  169.  DESCRIPTION
  170.  Bring the App to an End
  171. FileNewOpt_Click
  172.  DESCRIPTION
  173.  Create a new instance of the MDI Child form and increment the count
  174.  of open MDI Child Windows (handled by "OnFileNew" in the "MWDemo"
  175.  module)
  176. MDIForm_Load
  177.  DESCRIPTION
  178.  On Form Load, setup help file (this allows user to verify that help
  179.  still works while menu item is selected)
  180. winhelp.hlp
  181. MenuHelpText
  182.  DESCRIPTION
  183.  Given the logical ID of the menu item selected and the current 
  184.  "MenuState", return an appropriate menu help text snippet to be
  185.  displayed in the status areap
  186.  If the menu item was not recognized by the "MenuWatch" control,
  187.  then it must be one of the items added to the menu whoseo
  188.  WindowList property = True 
  189. [Separator]
  190. Switch to the window containing the selected document
  191.  If the "MenuHelp" String arrays have not been initialized, then
  192.  initialize them now
  193.  Determine what menu text snippet to use...)
  194.  If the currently-selected menu item is in a menu that appears
  195.  *after* the "WindowList" menu options created at design time (in 
  196.  this case, the "WindowList" menu is the File Menu), and new options
  197.  have been added to the File Menu, then store the count of new e
  198.  options in "NumExtraOpts"
  199.  If the currently selected item is one of the newly addedf
  200.  options, then determine if it is a separator or the name of
  201.  a document and exit this function immediately
  202. [Separator]
  203. Switch to the window containing the selected document
  204.  Based on the value assigned to "MenuHelpIdx" above, return thee
  205.  appropriate menu help snippet
  206.  MenuState 1 = no documents (MDI Child windows) open
  207. Switch to another application
  208. [Separator]
  209. Close
  210. [Separator]
  211. Maximize
  212. Minimize
  213. Restore
  214. Move, size, or close window
  215. File Menu
  216. File|New
  217. File|Open...
  218. File|Save
  219. File|Save As...
  220. [Separator]
  221. File|Preferences >
  222. File|Preferences|View...
  223. File|Preferences|Dialogs...
  224. [Separator]
  225. File|Exit
  226. Edit Menu
  227. Edit|Undo
  228. [Separator]
  229. Edit|Cut
  230. Edit|Copy
  231. Edit|Paste
  232.  MenuState 2 = one or more documents open, current document is
  233.  *not* maximized
  234. Switch to another application
  235. [Separator]
  236. Close
  237. [Separator]
  238. Maximize
  239. Minimize
  240. Restore
  241. Move, size, or close window
  242. File Menu
  243. File|New
  244. File|Open...
  245. File|Save
  246. File|Save As...
  247. [Separator]
  248. File|Preferences >
  249. File|Preferences|View...
  250. File|Preferences|Dialogs...
  251. [Separator]
  252. File|Exit
  253. Edit Menu
  254. Edit|Undo
  255. [Separator]
  256. Edit|Cut
  257. Edit|Copy
  258. Edit|Paste
  259. Document Menu
  260. Document|DocOpt1
  261. [Separator]
  262. Document|DocOpt2
  263.  MenuState 3 = one or more documents open, current document 
  264.  *is* maximizedd
  265. Switch to another application
  266. [Separator]
  267. Close
  268. [Separator]
  269. Maximize
  270. Minimize
  271. Restore
  272. Move, size, or close window
  273. Switch to the next document
  274. [Separator]
  275. Close
  276. [Separator]
  277. Maximize
  278. Minimize
  279. Restore
  280. Move, size, or close document
  281. File Menu
  282. File|New
  283. File|Open...
  284. File|Save
  285. File|Save As...
  286. [Separator]
  287. File|Preferences >
  288. File|Preferences|View...
  289. File|Preferences|Dialogs...
  290. [Separator]
  291. File|Exit
  292. Edit Menu
  293. Edit|Undo
  294. [Separator]
  295. Edit|Cut
  296. Edit|Copy
  297. Edit|Paste
  298. Document Menu
  299. Document|DocOpt1
  300. [Separator]
  301. Document|DocOpt2
  302. Restore document size
  303. MenuWatch_Close
  304.  DESCRIPTION
  305.  When the "Menu Watch" control informs us that the user has completed=
  306.  any interaction with the menu, revert back to normal status bar
  307. MenuWatch_Open
  308.  DESCRIPTION
  309.  When the "Menu Watch" control informs us that the user has begun=
  310.  to interact with the menu, refresh the "Menu Watch" control in case
  311.  the menu has been modified (due to addition of a document to thea
  312.  menu with the "WindowList" property set to True or because an MDI
  313.  window has been maximized or restored) and show the menu help status bar
  314. MenuWatch_Select
  315.  DESCRIPTION
  316.  When the "Menu Watch" control tells us that a menu option has been=
  317.  selected (highlighted), set the caption of the menu help status
  318.  bar to the appropriate text
  319.  Use the "MenuHelpText" function to get the appropriatea
  320.  menu help snippet (tell "MenuHelpText" that the "MenuState" isl
  321.  3 if we have a maximized MDI window, 2 if we have a non-maximized
  322.  MDI window, and 1 otherwise)
  323.